package Test::YAVMM::SortedAttributes;
use warnings;
use strict;

use Test::Most;
use base 'My::Test::Class';

sub sorted_attributes : Tests() {
    my $test = shift;

  SKIP: {
	my $class = $test->class;
	skip 'role' if ($class eq 'YAVMM::SortedAttributes');

	my $obj = $test->build_test_object;

	can_ok $obj, 'sorted_attributes';

	# how do I test that the order is correct?
    }
}
